object NagScreen: TNagScreen Left = 263 Top = 266 ActiveControl = Button1 BorderIcons = [] BorderStyle = bsNone Caption = 'Instant Drive Access 1.40' ClientHeight = 240 ClientWidth = 488 Font.Color = clWindowText Font.Height = -14 Font.Name = 'MS Sans Serif' Font.Style = [] FormStyle = fsStayOnTop Position = poScreenCenter Scaled = False OnActivate = FormActivate PixelsPerInch = 120 TextHeight = 16 object Label1: TLabel Left = 104 Top = 10 Width = 280 Height = 28 Caption = 'Instant Drive Access 1.41' Font.Color = clBlack Font.Height = -20 Font.Name = 'Arial Black' Font.Style = [] ParentFont = False end object Label2: TLabel Left = 197 Top = 49 Width = 106 Height = 20 Caption = '(Unregistered)' end object Label3: TLabel Left = 30 Top = 79 Width = 275 Height = 19 Caption = 'Instant Drive Access is NOT freeware.' end object Label4: TLabel Left = 30 Top = 98 Width = 441 Height = 20 Caption = 'Please consider registering Instant Drive Access (US $15.00)' end object Label5: TLabel Left = 30 Top = 118 Width = 411 Height = 20 Caption = 'For registration information look at Instant Drive Access'#39' homep' + 'age' end object RegLabel: TUrlLabel Left = 108 Top = 162 Width = 271 Height = 16 Cursor = 5 Caption = 'http://www.shareit.com/programs/100303.htm' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsUnderline] ParentFont = False PopupMenu = RegLabel. end object Label6: TLabel Left = 156 Top = 142 Width = 176 Height = 22 Caption = 'Visit this site to register online:' end object Button1: TButton Left = 187 Top = 196 Width = 92 Height = 30 Caption = 'OK' Default = True ModalResult = 1 TabOrder = 0 end end